home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 June / EnigmA AMIGA RUN 08 (1996)(G.R. Edizioni)(IT)[!][issue 1996-06][EARSAN CD VII].iso / earcd / amos / eaissu3b.lha / Source_Code / UN_Change_Pointer_Cols.AMOS / UN_Change_Pointer_Cols.amosSourceCode
AMOS Source Code  |  1995-12-30  |  668b  |  20 lines
  1. ' If you have opened a screen with less than 32 colours  
  2. ' you may have wondered how to change the colours of the mouse 
  3. ' pointer. if any one has tried to change them by editing the mouse.abk  
  4. ' file in the amos_system draw you will know that this does not work.
  5. ' With this procedure you can easily change its colour with one simple 
  6. ' call to this proc. 
  7. '  
  8. 'A is the outside colour of the mouse. 
  9. 'B is the right side colour of the mouse 
  10. 'C is the left side colour of the mouse
  11. '
  12. 'eg. 
  13. '               MOUSE_COLOURS_[$000,$DDD,$AAA] 
  14. '
  15. Procedure MOUSE_COLOURS_[A,B,C]
  16.    ' Procedure Written by Brett George
  17.    Colour 19,A
  18.    Colour 18,B
  19.    Colour 17,C
  20. End Proc